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Volume 2, Number 10% x x “~ yy « * ¢ _  Sept.17, 1980 
TuLS is the last for the 1980 fiscal year. The next issue, | 


November, will be the first of Volume Three. Again, we've had a number 
of issues over and above the guaranteed minimum of 6 per year, and 
actually more pages than last year's volume. The main reason to stop at 
this point is to allow my wife and myself the luxury of a month's 
vacation to celebrate our twenty-fifth anniversary. Hopefully, the extra 
material in this issue will tide you over until we return and have the 
opportunity to prepare the next issue from all the material you will 
have continued to send in. While we will have a house-sitter, there won't 
be anyone around to do anything about telephone calls. Mail will be 
picked up by one of the local elves, if an "A" or "ARCADIAN" appears on 
the envelope. 


SINCE, this is the end of Volume Two, it follows that subscriptions for 
Volume Three are now due. I'll continue the guarantee of at least 6 
issues, as I have in the past. There were 5 'extras' in Volume One and 

4 in Volume Two under that scheme. The rate for the next Volume will be 
$12.50, partly in anticipation of a postal increase rumored for November, 
partly to worry about the proposed 9-digit Zip Code we may have to 
reprogram the address list for, and partly to allow for some increase 

in productivity in preparing and distributing the paper. For example, 

it takes 2 hours of work per.100 copies, between receipt from the printer 
and delivery to the post office. I'd like to decrease that labor cost 
and mechanize the operation a little more, but that costs money. Recall 
that this is a part-time hobby operation, and there are other things that 
call upon my time. 


a 
A 


AN INCREASE in the number of subscribers would be a more palatable way 
© increase revenues, so why don't you make it a personal goal to induce 
a Bally buddy to have his own subscription, and I'll consider a rate 
reduction... Each of the little projects and publications is priced to 
stand alone, but a peculiarly large amount of money is consumed by the 
little nickle and dime (quarter and half?) things like extra postage, 
telephone, gas to the printer, lost mail, etc., that in the aggregate 
become a considerable sum. 


idk nlite are encouraged, for when a couple of owners can get together, 
more 1S accomplished than when working alone - mutual assistance,- etc. 
We've identified a couple of these in past issues and would like more to 

be developed, especially as we get into more complicated subjects. To 

further this concept, I'll send additional copies of the ARCADIAN to the | 
same address at a reduced rate - three or more copies to one address at | 
$8.50 per subscription. 








“WHEN SENDING your subscriptions for next year, it would make things 
easier if you would put an "S" on the envelope and we can channel 
those into the right pile to get the next year's address labels 
made up as soon as possible. 





© 1980 Robert Fabris 
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MORSE CODE CENHANCED & CORRECTED) 


1@ 
cu 





ARCADIA 


:RETURN ;CLEAR ;NT=1 ; 
BC=RND (32)b8;FC=BC+4+RND (320b8 


PRINT ;PRINT " MORSE CODE 

PRINT ; INPUT “ SPEED?Y’D 
PRINT ;PRINT “TYPE WORDS RUN FOR CODE 
PRINT ;PRINT “YOUR MESSAGE: 

PRINT ;B=6 

B=B+1;N=KP;IF N=t@AGOTO 266 


@( BISN; TV=N5 4F N=31B=B-2 
GOTO 74 | 





MORSE CODE MODIFICATION by Bob 


Weber adds a little enhancement 

: by adding a question at the end -~ 
press PRINT to repeat the message, 
press ERASE to start a new one, & 
press + to add to the message. 


CLEAR ;FC=@; BC=3; P=@; CY=4@;F OR A=1LTO B-1 


P=P+1;1IF P=1@P=0; CY=40 
N=@CAISNT=@; TV=N;PRINT “ “,;NT=D 
IF N<44G0TO 368 | 

IF N>SM@GOTO 384 

IF N=47GOTO, 386 

IF NOS7IF N<65G0TO 3268 

GOSUB Nbig 

FOR C=1TO 25bD;NEXT C 

NEXT A 

GOTO 1686 

T¥V=31;PRINT ;FOR C=1TO 25bD;NEXT C 
GOTO 286 


Utilize lines 440 through 1000 as written, with the two corrections added below. 


1985 
18168 
1828 
18328 
1848 
1258 
1968 
19768 
There 


change 660 to read PRINT"QOp - 
change 460 to read PRINT"Q Q69 Q Off Q OPP"sRETURN 


described on p. 80 has a partial error in table 


De 
i 


CLEAR 


B=B-1;NT=6;FOR C=1TO B 
TV=@(CISNEXT C;PRINT 

PRINT "END OF MESSAGE 

IF &€2@3=16B=B+1;GOTO 206 

IF &€21)=16RUN 

IF &€26)=8B=B8+1;@(€ BI=32;PRINT 
GOTO 1846 BS. phi cha deel 
were two errors in the listing on p.81: 
Q Q Q"; RETURN 


eA 


S. G 
2. I identified chip U14 and pin 16; but 
_and pin 6, as was mentioned in the text. 


385 IF 2>3 


ATTACK MODIFICATION REBUTTAL 


that the modification I presented on Pe 
in two-square increments, . 
within the wall constraints. 


“INPUT "“;GOTO 7@. 


ee erry Se 


Which is not the intent. 


Bob Weber 
6594 Swartout Rd. 
Algonac, MI 48001 


it should have been chip U14 


eae Ae |e Ac eet | a nnn essa Sas OCT OS 


Carl Morimoto, author of ATTACK, indicates 


67 will cause the piece to move 
Pieces must stay 


BASE CONVERSION by Ron McCoy puts it all together. Now you can have one 


program 


at will convert from any of the numerical systems into the 


other four, rather than have to use individual programs. If you start 

with decimal, the program takes the whole number in one Piece and converts 
it. If you start with any of the other four, you have to enter each digit; 
as with Hex- 





to enter 23AC, enter 2 GO 


EIGHTY- 


3 GO 


A GO C GO and thats it. | 




















































94 
168 
109 
119 
126 
138 
148 
156 
168 
{73 
186 
198 
208 
218 
226 
239 
240 
258 
268 
270 
286 
298 
388 
3il 
| al2 
313 
314 
315 
316 
317 
318 
319 
328 
321 
322 
323 
324 
338 
339 
348 
358 
358 
376 
380 
398 







e % 
ARCADIAN 
-BASE C@NVERSION ” a . 
RGN MCCBY 


MAY 34, i979 


.$Z=385 r 
: RETURN 

CLEAR 

PRINT “INPUT KNOWN BASE - 

PRINT *  8B,D,H @R O";PRINT Ron McCoy 

P=KP;IF (P="B" )+(P="D" )+(P="H" )+(P="0" GOTO 6B 7509 W. River Rd. 
PRINT "*INVALID-TRY AGAIN®";GOTO 249 Minneapolis, MN 55444 


IF P="D"INPUT “INPUT #"S;GOTO 248 

PRINT “INPUT CW LEADING @’S 

IF P="O"GOTO 188 

IF P="B"GOTO 518 

»~HEX TO DECIMAL: 

A=16; B=11;C=12; D=13;E=14;F=15 

PRINT "4 DIGIT HEX # | 

INPUT W,X,Y,Z 

TF CW>7)+0X%>159+0Y91594+(Z>15)PRINT “TOB BIG";GOTO 129 
S=( 4996bW )+( 256bX )+( 16bY )+Z 

GOTO 226 

-8CTAL TO DECIMAL 

PRINT “S DIGIT @CTAL # 

INPUT V,W,X,Y,2 

TF CU>7)+CW>7 +0 Y>794+0Z>7 PRINT "TOG BIG":GOTO 188 
S=( 4696bV )+(S12bW)+( 64bX )+¢8bY )4+Z 
PRINT ;PRINT #1,5,"° DECIMAL 
-BINARY TO DECIMAL 
























416 W=W+48 






om, ie irontaoscson 
=O+( + 
ne Bee 438 U=L+(2bK 4+ 4bs) 
nanan 44Q T=I+(2bH)+( 4bG) 
coe | 458 S=F+(2bE)+( 4bD) 
cate sae 460 R=C+(2bB)+( 4bA) 
ar 48@ TV=W; T¥=X;TU=¥:TU=Z;PRINT " HEX 
satin 49@ PRINT #1,R,S,T,U,U," @CTAL 
ee 582 PRINT ;GOTO 20 
ane S89 PRINT “Ta@@ BIC 
J=RM _.§ 514 PRINT "15 DIGIT BINARY # 
TaRM 528 INPUT A,B,C,D,E,F,6,H,I,J,K,L,M,N,O 
H=RM if 930 IF CADE IECHSIIF(C)1I4(D1FCE DHE 31 IHCG>LIECHDL IEC TOD OF 
G=RM . COOL 4CKL FCO LIF (MD 1 4CND1 40031 GOTO sa9 
Guts S40 S=( 16384bA )+(8192bB )+( 4096bC )+( 2048bD )+( 1824bE)+(512bF + 
E=RM _____ (256b6 +01 26bH +084 BT )+¢ 32bT 14+¢ LGbK)+C 8bL) 
npn _ | 550 S=S+¢ 4bM)4+¢(2bND40 
C=RM “ff 568 GOTO 229 . os 
B=RM , 


A=RM; RETURN | ¥ | 
PRINT #1,A,B,C," ",D,E,F,G," "sHeT,S,K,° ",L,M,N,O," BINARY 
BINARY TO HEX 

2=0+( 2bN)+( 4bM3+C 8bL 3 IF Z>9Z=Z+7 
Z=7+49 

Y=K+( 2bJ )+(4b1)+(8bH); IF YS9Y=¥+7 
Y=Y+48 
X=G+( 2bF + 4bE)4+(SbD):IF X>9x= X+7 


X=X4+49 
FIGHTY- NINE. 


W=C+( 2bB + 4bA) 


























= ' as a ‘i ; 3 
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ARCADIAN 





BALLY WAS SPOTLIGHTED during Personal Computing 80, the fifth annual 
personal computing and small business computer show, held in 
Philadelphia on August 21-24, The "largest personal computing show 
in 1980" devoted 2$ hours during the Visual Arts Festival held on 
Sunday and sponsored by the Philadelphia Area Computer Society, to 
the Bally Home Computer System. The topic, “Low Cost Pixel Art" was 
presented by Zuszsanna Molnar and Frank Dietrich of Chicago Circle, 
University of Illinois and Professor Lou Katz and Jinko Gotoh or 
Columbia University. Discussions supported by video tape included 
interactive programs for graphics, real time animation, and the new 
Bally ZGRASS System. The marketing tape on the ZGRASS system ($2800 
with monitor) was quite impressive: four times the video resolution 
of the current Bally Arcade, 64K of memory, floating-point arithmetic 
with trig functions, and other great features. Topping the show off 
with a visit to the Bally Park Place Casino in nearby Atlantic City 
made it a memorable weekend - (No winnings to report! ) 


Computer Club - I can use more ready-to-print material, thanks Karen) 


PROGRAMM ING HINTS listed below were extracted from an article by Steve 
Kimmel in the August Creative Computing (p.64) are are submitted as 
guides for the types of programs to write: 
o Don't write the program if you are going to do the job only once or 
twice a year. 
. © Don't write a program if a human could do the job in less than 
5 minutes. 
0) Don't write a program if you could do it better with a calendar and 
pencil, file boxes and cards, or a calculator. 
Oo Don't write a program if you don't need the accuracy, 


(above report direct from Karen Phelps Cravedi of the Tidewater 


TOUCHTONE modification by Rich Tietjens, now settling down at 
Monterey »CA for a few months. 


65 IF ((N 47)+(N 58))=((N 64 Po a ae ae 


287 C=119; R=188; RETURN 
294 C=146; R=188; RETURN | 
| 





317 C=109; R=253; RETURN 
318 C=109; R=230; RETURN 
319 C=109; R=208; RETURN 
320 C=109; R=188; RETURN 
WIS program by Ron McCoy is a challenge. Modified from a program in the 
June 1979 Personal Computing, it sets up a 9x19 grid on the screen. 
Fifteen "walls" are randomly placed in the squares, and the 15 "bots"(*) 
are also randomly placed. Then your position is similarly located. 
Hand controller 1 is used to move the target (you) in any of the eight 
available directions, or stand Still, and the trigger makes it happen. 
(The knob is USed to turn a little indicator to the desired direction. ) 
After you make your move, all the bots Start to advance upon you, one 
square at a time, each. If they hit a wall, they disappear. The object 
is to Wipe them out, but it is a difficult job. You have to maneuver 
yourself so that the bots keep hitting walls. I kept Saying 'next time 
I'll get them', to no avail. 








- BOTS 
-BY RON MCCOY 

> RETURN 

CLEAR ;BC=0@;FC=142;R=15 
PRINT “B@TS ARE #*’. I’°S ARE 


PRINT “WALLS. BOTS MBVE AT YOU, 


PRINT "BUT DIE IF THEY HIT A 
PRINT “WALL. KN@B P@INTS WAY, 
D=609; I=658;L=700 

PRINT “TRIGGER MAKES MOVE. 
FOR A=1TO S99;NEXT A 
C=8;V=1;N=@; CLEAR 

FOR Y=-32TO 4@STEP 8 

FOR X=-7@TO G3STEP 7 . 
C=C+1;@(C)=@; BOX X,Y,6,7,1 








. 898 IF @(C)=73B0x. 0,P,6,7,1;@¢€A 
988 V=15@CCI=N+1; 3 CX=G3 CY=H; TU=42; 


NINETY-ONE 































468 NEXT A 
47@ IF V=1C=M;GOSUB L: GOTO 249 
4880 GOSUB 750;R=R+1 
430 PRINT "H@T DAMN! Y@U WON! 
589 GOTO 53a 
518 GOSUB 75@;R=R-2 
‘528 PRINT "DRAT!. 
538 PRINT "WANNA RERUN? 
546 PRINT #1,"IT’LL BE *,R, 
559 PRINT "1=YES 
| 56@ A=KP 
5780 IF A="1"°GOTO 32g 
S8@ STOP 
| 68@ X=RND (2@)b7-77 
618 Y=RND (16)b98-49 
1 620 O=X;P=Y: RETURN 
(658 T=2@b( 7+32)c8 
668 S=(X+77)c7 
.67@ C=S+T; RETURN 
‘788 P=(209- -~C c20+1;P=11-P 
1\718 O=C-( 2QbP +20 . 
728 P=8bP-4@; 0=7b0-77 
:736 X=0; Y=P; RETURN 
“758 CX=-70;CY=CY- 16; RETURN 
‘888 GOSUB L 
‘826 IF OJ x=x-7 
838 IF OJ xK=x+7 
848 IF PK Y=yY-8 
856 IF PCK y= +9 


" BOTS 


98@ IF @CC)=43CX=6; CY=H; TV=79;60TO Sip 
=@3 RETURN 


BOX O,P,6,7;1; RETURN | 


7@ NEXT X 
88 NEXT ¥ 
98 FOR A=1TO R 
19@@ GOSUB D 
11@ GOSUB I 
120 IF @(C)#@GOTO 108 
138 CX=0;CY=P; TU=73;@(C)=73 
14@ NEXT A 
15@ FOR A=1TO R 
16@ GOSUB D 
17@ GOSUB I 
18@ IF @(C)#@GOTO 168 
19@ CX=0;CY=P; TU=42; @(C)=1 
286 NEXT A a 
2146 GOSUB D 
224 GOSUB I | 
230 IF @(C)#@GOTO 219 
24@ FOR B=1TO 758 
250 BOX 0O,P,7;7,23LINE 0, P,4:BOX 0,P,2,2,1 
268 Q=(KNC1)+127)¢c29 | : 
270 IF G=1LINE 0,P+3,1;M=20 Uo pepe 
280 IF Q=2LINE 0+3,P+3;12M=21 
290 IF Q=3LINE O+3,P, LiM=1 | 
300 IF Q=4LINE 0+3,P-3,1;M=-19 
310 IF Q=SLINE 0,P-3,1;M=-28 | 
328 IF Q=GLINE 0O- -3,PsastiNe-21 | an 
33@ IF Q=7LINE 0-3,P,1:M=-1 
346 IF Q=8LINE 0-3,P+3,1;M+19 , 
356 IF (€@¢1)94+(Q>8M=@. oo  - 
369 IF TRC LIBOX 0,P,7,7,23 BOX ‘O,P,6, 7 ‘Li GOTO 400 
378 NEXT B | 
388 FC=0; IF TROLIFC#142: GOTO 240. 
398 GOTO 38a _ 
400 @(C)=0;M=M+C; C=M 
41@ GOSUB L 
42@ CX=§0;CY=P; TV=43; @(M)=43 
430 J=0;K=P; V=@;N=N+1 
44@ FOR A=1TO 280 
45@ IF @(A)=N C=A;GOSUB 98aa 

















38 
186 
114 
120 
136 
1468 
156 
A155 


COUNT THE DOTS * 


; Pi 
x ce Sus s = 
-(C) 1988 L. & M. PORTER eae Tal 


NT=8 Ss, 
H=@; I=0;E=8;0=6 

G=8;L=8 

R=6; M=@; Q=8; W=G 

P=0; B=; C=@; N=@ 

CLEAR ;PRINT * 


INPUT # OF ROUNDS OF COUNTING ?"; INPUT X 
IF xX<1GOTO 48 . 

IF X>S4NT=3 
IF X>S4PRINT “SMALLER # OF ROUND “3PRINT "PLEASE! “;NT=@;GOTO 4@ ‘ 
CLEAR ;PRINT “INPUT DIFFICULTY";PRINT ;PRINT “1-HARD TO S6G-EASY" ; INPUT 


IF D>S@BGOTO Sa 

IF D¢<1GoTO Sa 

CLEAR ;BC=249;:FC=7 

FOR A=1TO RND (17) | 

BOX RND (5@)-25, RND (499-22 5%,1,1 


NEXT A 

FOR Z=1TO D 

IF TRC1)=160TO 156 
NEXT Z 


CLEAR ;PRINT Z 


IF Z=1NT=5;PRINT "DON’ T CHEAT BY HOLDING ";PRINT “THE TRIGGER IN";PRINT “NO 


W, GET READY GO!";NT=@;GOTO g@ 


166 
17a 
175 
177 
196 
282 
26S 
207 
268 
218 
| 238 
- 248 
258 
268 
278 
288 
285 
2968 
388 
318 
3208 
325 
338 
' 348 
358 





PRINT "YOUR COUNT?" ; INPUT K 

Q=Q4+2 

IF K=A-1 I=I+7 

IF K#A-1 W=W+7 

IF K=C€A-1)PRINT "RIGHT! *;IF K=(A-1) B=B+1 
IF K=A-1 IF A-1>=9 P=ABS(8-(CA-1)) 

IF K=A-1 IF A-1<¢9 eae: 

IF A- 1>=9 ‘E=E+1 

IF K=A-1 H=H+P | 

IF K=CA-1)G=G6+(A-1) 

IF K#CA- LDCS PRINT “SORRY PAL; IF K#CA-1) C=C+1 
PRINT “DOTS . »#1,A-1 

PRINT “RIGHT ",#1,B 

PRINT,; “WRONG “,#1,C 

FOR J=1TO Seg 

NEXT J 

BC=249 

N=N+1 

M=M+CA-1) 

R=R+K 

IF N=XPRINT “GAME OUER 

O=688-D ; 

L=(660-D)bx © 

V=eLcQ és : 
F=CEb( Uc 18)+E4+B+H+G+( ( (ObB)-1)c1Q) 610 


NINETY-TWO 
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36@ IF N=XPRINT “CORRECT COUNT=",#1,G 

398 IF N=XPRINT "“ADISTD DFCLTY FCTR=", #1,U,#1,".", CRMb1@)cQ 

466 IF N=XPRINT "TOTAL“INPUT °,#1,M,"7",#1,R 

42@ IF N=XPRINT “TIME/USED ",#1,¢D+1 bX, #1,°7",#1,0 

425 IF N=XIF B+G+E+H<25G0OTO 465 \ 
43@ IF N=XPRINT “REACT TIME’CRRCT RND=",#1,IcB 

446 IF N=XPRINT “AUG REACTION TIME/RND=", #1, CW+I IcX ini 3 
45@ IF N=XPRINT “ALOTD/USED *,#1,¢CD+1 bX JcM, #1,°.", CRMb1@)cM, "“",#1,QcM,#1,".° 
»(RMb1@IcM 

451 IF N=XPRINT “USED/’CORRECT DOTS=",4#41,QcG,#1,".",CRMbi@)cG 

452 IF N=XPRINT “FOR HARD RNDS=", #1, QcCH+(9bE)),#1,".", CRMb1@IcCH+(9SbE)) 
466 IF N=XPRINT "# OF HARD RDS=",#1,E,"° ABS=",#1,EbB+H+G+( ((ObB)-I)cl@) 

465 IF N= IF X<i@PRINT "1@ RDS + FOR PRAC. SCORE; TRY AGAIN";GOTO 488 

470 IF N=XPRINT "PRAC. SCORE=",#41,F 

472 IF FT T=F 

473 IF N=XPRINT “HI SCORE=", #1,T 

486 IF N=XINPUT “SAME=1 NEW=2°U 

496 IF N=X IF U=1 H=@; I=; E=8; 0-0; G=0;L=0; R=; M=@; Q=0; W=G; P=Q; B=@; C=O; N=@; D=D; X 
=K%;GOTO 68 . 
5@@ IF N=xIF U=2GOTO §S 

518 GOTO 68 















-{ 


— THE DOTS program puts up a random number of dots on the screen 
or a short period of time, and as soon as you've counted then 
hee pull the trigger to Stop’ the clock, and enter the amount in the key- 
ere aig computer will keep track of the Score. "DIFFICULTY" sets the 
&- By changing the X and Y valu -, you change the size of the 


if 


ophthalmology - checking field of view of . 
one's eye, blind spot size, 
etc., and other ideas having to do with pareeptia: can be ee. 


Les Porter, Box 61 Claude, TX 79019 


eal e ge gt you technical types that obtained the material 
e e last issue, here is a parts 1 
gar Veoulesd Bays ’ p ayout of the pe board as 


playing field. On the surface, this seems to be just a simple game, but 


we look a little deeper, we can see an application in the field of 









~ NINETY-THREE i TE 
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148 
260 
285 
218 
226 

Zen 
256 

508 
581 

583 
585 
514 
SiS 
520 
525 
526 
5308 
Sas 
Sar 
540 
545 
554 
564 
565 
578 
ot 
575 
576 
588 
585 
598 
595 
sor 
688 
618 
615 
618 
628 
625 
638 
635 
668 
665 
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CONNECT FOUR 

.BY BOB WISEMAN 

GOSUB gaa 

A=1;SOSUB 208;GOSUB 72a 

IF EGOTO 1Laa 

A=2;IF B=1GOSUB 5aa Bob Wiseman 
IF B=2GOSUB 22a 118 St. Andrews Dr. 
GOSUB 78@;IF EGOTO 149 Cincinnati. OH 45245 
GOTO 22 

GOSUB 888;GOTO 18 

CX=-77;CY=49 | 

PRINT "PLAYER",#2,A,"-ENTER COLUMN “, 

K=KP; TU=K; X=10bK-528 

Y=28;GOSUB 975 

IF I#@MU=78;MU=49;GOTO 205 

RETURN 

H=30@80 ; Q=-H; C=8; CX=-773CY=48 

NT=@; &( 21 =15; &(22 )=-1;R=0 

PRINT “NOW I WILL FIND A MOVE “, 

FOR X=-38TO 3@STEP 19; Y=-30;R=0 

GOSUB 975;IF I>@Y=Y7+1@;GOTO 518 

IF I<@coto ssa 

N=4-ABS( XbY Jc 180; W=k; Z=Y3 K=O 

FOR L=-1TO 1;FOR M=-1TO 1 

&( 16 )=X+30; &C 17 )=28bL +28; &( 18 )=Mb38+30 
X=W;Y=Z;IF L=BIF M=GGOTO S7a 

F=3:K=K+1;P=0 


&(19)=Kb15 
X=X+1GbL;Y=Y+1@bM;GOSUB 975 
IF F=3F=1 


IF I<iGoTo 565 
IF I=F P=P+2bI-3;GOTO 540 
R=R+ABS(P );@C(K =P; @(K+8 =I 

NEXT M;NEXT L 

IF R=9GOTO 625. 

FOR M=1TO 8; I=@(M);J=@(9-M) 

&C19)=Mb17 

L=J+1;P=@(M+98);R=@( 17-M) 

IF (L=3)+(€I=3)D=H 

IF (L=-3)4+( I=-3)D=0+5a9 

IF I>@D=D+1;IF P=@D=D+1 

IF I#@D=D+1;IF P=@D=D+1 

IF (CC IbI=4)b(J=@))+(L=2) )b(P=8 b( R= )D=D+100 
NEXT M . 

IF (@(2)<G)+C@(3)<O)4+( @(7)XB)4+(@(8I<BIGOTO G2B 
GOTO 625 

A=1;X=Wl;Z=Z7+10;:GOSUB 720;IF E=1 E=8;D=D-Hc1@ 
A=2 3; X= 

IF D=QIF RND (3)=1 Q=-H 

IF D>G C=w;Q=D 

NEXT %3X=C 

&C19)=@; &( 19 3=8;NT=1:%(28)=0; RETURN 


NINETY -FOUR 





























76a 
78S 
710 


T15. 


728 
725 
738 
* 735 
748 
745 
75a 
755 
768 
765 
778 
798 
saa 
8a5 
818 
908 
. 985 
918 
915 
928 
925 
938 
958 





connect 4 


(con't) 


Y=20; W=X 
Z2=7;I=A;GOSUB 354 

Y=Y-18;GOSUB 975; IF I#@coToO. 720 
Y=Z;GOSUB 954; Y=Y-1@;GOTO 7@5 — 


K=@;FOR L=-1TO 1 


FOR M=-1TO 1;IF M=@IF | ‘Le@coTo 758 
K=K+1; X=; Y=Z3 P=0 
X=X+ 1@bL.; Y=Y+1@bM; GOSUB 975° 

IF I=A P=P4+15 | GOTO, 735 | 

@(CK)=P 

NEXT M:NEXT L 

FOR K=1TO 4 

IF @(K)+@(9-K)>2E=1 

NEXT K;CX=CX- -6; TUS3Z bg 
Xai ee eet * 
RETURN | eo wh gp 0 hee oe 
CX=-77;CY=49° 2 

PRINT *GAME OVER -- 4 IN’ A ROW" 
PRINT "PUSH GO";K=KP;RETURN ~~ 
CLEAR ; INPUT "#PLAYERS? “B 
IF B>2GOTO 989. 

CLEAR ;E=@;NT=1L; BOW 47:3 Fosse 
BOX @,-5,71,61,1;T#=@ 
FOR X=-38TO 38STEP’ 1a. 

FOR Y=2@TO -3@STEP: -18 
GOSUB 956;NEXT 3 NEXT Xs RETURN. 
BOX. X,7,9,9,2 


















-BY MATT GIWER 








yy 
2 

eee: 

4 .SPIRALS 2 
5 

6 





NT=@ 





955 IF I=1B0X X,¥,7,7;15BOX X;¥,3,3,2 a | 
960 IF I=ZBOX X,¥,7,3,17B0X.X,¥,3,7,1 ~~ cakes ea tr 
(985 MU=CX+Y4+50 061 ote: Bais ) 
; Bye 2086 B= 
970 RETURN | ve 5 RND (2) 






218 C=RND (2) 
868 X=B; y=g 
858 FOR D=1TO 199 
98@ X=x+B 
985 Y=Y+c 
_ 987 IF X>75GOTO 109 
9@8 IF Y>4SGOTO 108 
918 GOSUB 1ase 





IF (ABSCX)290)4C¥<-20 180920 IT-15 RETURN 
TAPKCX, eonaeeni pA )F RE DURE 


‘975 
986 











on 
i wed 



















358 NEXT D 
Gq ee 994 GOTO 18 
2S ATRBRUSH' 









1A@6@ LINE X,0,A _ 
,187@ LINE @,-Y,A 
1998 LINE -xX,0,A 
1118 LINE 0,Y,A 
1288 RETURN 

19600 .M 

1> 


re 


o AND 8 oes. 
-SANDBLAST 





{ 
1850 .M 







“ANT FARM ec. SCHRETER)/Ce 













K=X+IKCLD 
Y=V¥+IYC1L)- : 
AeC 12B4KNC 1) 0841 
36 Bea * 
- 48 BOX xX+RND CA)- -Acz, Y+RND (B)-Be2,1,1,3 
50 GOTO 2B 


3 

4 

5 

6 

. 

Bos 
— 18 ‘CLEAR 

28 

38 

35 
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GRAPHICS ASSEMBLER is a 
to construc 


programming aid for those of you who want 


Shapes uSing the box canmand. Instead of using paper and 


pencil to figure out where you want the various boxes, this program 
allows you to set up a box Size, move it around the screen to where 
you want it, and freeze it there. The coordinates of the location are 
now in memory, using the following instructions; 

Use trigger to start system after pressing RUN/GO 

Enter X and Y coordinates of box size 

Enter type of box (1-4 per BOX command ) 

Move joystick to desired location 

Press trigger to freeze box location. 
It will list the command to tape at any line number you select. It 
will also save a number of these commands and place them all on tape 


with a uniform line s 
"RECORD PROGRAM". 


NobWN Pe 


18 
28 
30 

188 

185 


118 


126 
138 
148 
156 
15s 
157 
158 
16@ 
178 
188 
185 
187 
1956 
288 
219 
226 
238 
246 
256 
268 
278 
3288 
316 
326 
346 
345 
358 


-GRAPHICS ASSEMBLER 
~-BY HUGH FITLER 

> RETURN 

NT=@ 

N=6; X=@; Y=@ 

IF TRC1)} GOTO 148 

GOTO 26 

CLEAR ;IF N>@GOSUB 7aa 
PRINT “SIZE? 


INPUT "X"A;IF AX1IGOTO 116 
INPUT "Y"B;IF B<1GoTO 129 
INPUT “TYPE?"T;IF (T<1)-€T>4)GOTO 1234 


ES 
CY=49;GOSUB 680;PRINT * 


PRINT “PRESS - KEY TO REJECT BOX 


GOSUB 988 
IF N>86OSUB 7a 
M=KAFIKC LIGV=V4t IVC 1) 


BOX X,Y,A,B,E;BOX X,Y,A,B,3 
IF TRCLIE=T;GOSUB 884;GOTO 498 
IF &(20)=4IF N=4GOTO 168 


IF &(2@)=4GOTO 468 
GOTO 166 — 


CLEAR ;CY=4@;INPUT "1ST LINE #?"C 


INPUT “LINE SPACING?"F 


PRINT “TURN RECORDER ON AND";GOSUB 6aa 


PRINT ; PRINT 


IF TRC1):PRINT ;GOTO 260 


GOTO 248 

FOR M=@TO N-1 

PRINT #2,C,“ BOX ", 
FOR P=8TO 4@@STEP 199 


PRINT #1,@(M+P),;IF P<4@@PRINT ys 


NEXT P 
PRINT 
C=C+F 
NEXT M 





pacing. This will take place if you command 
This program was developed by Hugh Fitler 


















355 :RETURN ;NT=@ 

368 PRINT 

365 PRINT “TURN RECORDER OFF AND";GOSUB 62a 
37@ IF TRCLICLEAR ;GOTO 196 

375 GOTO 378 

468 @(N)=x 

416 @(N+186)=¥ 

426 @(N+200)=A 

436 @(N+3@9)=B 


= y= 
se cohiraialll Hugh Fitler 
lathe 628 W. Utica St. 
se Py GOSME: BSP Sellersburg, IN 47172 







TO SAVE BOX 


PRINT "“?";K=KP 

IF (K<"1")-(K>"2" GOTO 468 

GOTO (K-48 )b189 

PRINT “SQUEEZE TRIGGER", ;RETURN 
FOR M=@TO N-1 


BOX @(M),@CM+190),@(M+2a0), 


@CM+388), @CM+4a9) 
NEXT ™ 


BOX X,7Y,A,B, T; RETURN 
CY=48;PRINT “ADD A NEW BOX 1... 
PRINT “RECORD PROGRAM... .2 
GOSUB 99g 

GOSUB 7ag 

RETURN 

BOX 8.CY,159,16,2 

BOX -55,-18,58,69,2 

RETURN 


| 
| 72@ RETURN 
| 
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MORE ADD-ONS are in process to expand the utility of the Bally machine. 

ese items will use the capabilities of the Blue Ram to one extent 
or another. These add-ons will be available in the form of kits, as well 
as completed equipment, and take the form of adapters, to be plugged 
into the socket on the top of the Blue Ram. The kits will include the 
supporting programs and documentation. The first kit will be for the 
full size keyboard addition, and will be available on October 17. 





KEYBOARD ADDITION: This kit at $24.95 provides the hardware and software 
needed to attach a JAMECO 610 Unencoded Keyboard to the Blue Ram. The 
JAMECO address is 1355 Shoreway Road, Belmont CA,94002, and the current 
price is $34.95. Should you desire a wired and tested combination, the 
package price is $89.95. Please order the keyboard direct from JAMECO- 
it just saves the double shipping,etc., and we don't have to inventory 
them. When the package is attached to the Bally via the Blue Ram, with 
its 36" cable, you will have: _ rit ct 

Full 96 character ASCII codes, including control characters 
Special Words Keys 

Modem compatible functions 

Compatibility with the new Extended Rasic 

Complete support program and documentation 

An attractive partial enclosure 

Maintenance of the Tape Cassette Interface 


FUTURE ADDITIONS: 
Oo e next kit will be the home control module that will use the 


common BSR "X-10" system. Be sure to purchase the command module that 
contains the ultrasonic receiver since the mode of operation of the|Blue Ram 
module will be to send the proper ultrasonic signal to the BSR unit, 

Which will then act as though you made a manual input. This would be 

a great) utilization for a salvage board, as you could program the Blue 

Ram through your regular machine and its Tiny BASIC, then transfer the 

Blue Ram to the salvage board (maintaining power on, of course), and 

the salvage board would then perform the programmed operations. 


eooo0o0000 


fe) Then we will provide the software necessary to have the Blue Ram - 
act as a compiler for music programs. Using Processor Technology 
format, one can simply enter musical selections and the software will 
convert that into the proper language that the Bally can understand. 


way telephone communication, using a commercially available modem 
device. Again, the addition will provide the intelligence to make the 
Bally and modem operate together. The Cassette Interface will be 
operable with this addition, to allow material to be taped on and off 
the telephone line. 





ieee = en a 





As each of the above gets closer to production, we will report more 
fully. The schedule now has the control module available in mid-November, 
the compiler program in December. The Extended Basic cartridge is 


\ 
oe After that, we will produce the modem addition, to allow two- 
essentially complete and should be available by the end of the year. 
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unexpected costs which have been steadily mounting. 
Effective IMMEDIATELY, the $60 and $70 kits are 
discontinued. The full $130 kit and the wired $170 kit 
will be subject to a $10 increase each after October 15, 
1980. We regret having to take this measure but it is 
necessary if we are to continue our broad support. 


HYBRID PROGRAMS TUTORIAL. Hybrid programs are those wich 
contain both machine-code program segments and BASIC 
program segments. The BLUE RAM UTILITY, the BLUE RAM 
DIAGNOSTIC, and the resistance measuring program from the 
last issue are three examples of hybrid programs. Transfer 
to the machine-code segment is via a CALL nnnnn statement 
in BASIC where nnnnn is the location of the machine-code 
routine being referenced. Transfer back to BASIC is via 

a C9 return instruction in the machine-code program. The 
advantage of using machine-code program routines is that 
they run several orders of magnitude faster and can easily 
perform logical type operations such as ANDing and ORing. 
It is, however, very important to remember several NO-NO's 
in conjunction with hybrid programs written under the 
current Bally BASIC: 

1. Machine-code programs must not write into RAM 
areas occupied by the BASIC program. This means that many 
of the powerful built-in routines for graphics cannot be 
used without some care since the BASIC program is written 
in screen memory. 

2. The DE register pair of the 280 is used by BASIC 
to keep track of where it is in the BASIC program. The 
machine-code program must return it to BASIC with the 
Original value if the BASIC program is to resume beyond 
the CALL to the machine-code program. 

3. "Background" processes, running machine-code 
programs must also call 20B0 in order to provide BASIC with 
its background processing. 


BLUE RAM PRICE CHANGE has become necessary because of 


The last rules will be more meaningful as we proceed. 


the BLUE RAM UTILITY. The utility contains facilities for 
entering and dumping the machine-code portion. Bally BASIC 
is used in the normal way to dump the the BASIC portion. 
Here is a step-by-step procedure: 

1. Connect the BLUE RAM, insert the BASIC cartridge, 
and press RESET. Both BLUE RAM switches should be UD « 

2. With the BLUE RAM UTILITY tape in the player and 
rewound, enter: :INPUT GO. This step will load the BLUE 
RAM UTILITY. Note that there seems to be a pause after a 
the first statement. Since the first statement does not 
have a line number it is executed immediately upon receipt. 
The effect of this statement is to continue to load data 


DUMPING AND LOADING HYBRID PROGRAMS is quite simple using | 
from the tape and place them in the BLUE RAM memory. They 


are not printed and therefore nothing is seen as they are | 
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loaded. The &(192)=0 in the statement places the BLUE RAM 
memory in the RAM mode so that it can be written into. The 
&(64)=0 at the end of the machine-code segment load switches 
the mode back to ROM. It is important to remember that just 
loaded memory is left in the ROM mode and cannot be written 
into further without switching it back to RAM either manually 
or by program statement. The load is complete when the 
screen is cleared except for "BLUE RAM UTILITY 6000" at 
the top. Stop the tape at this point. 

3. Once the BLUE RAM UTILITY is loaded it can be used 
to enter a new machine-code program or modify an existing one 
(already in BLUE RAM memory). Note that the utility switches 
the memory mode to RAM and back to ROM when changing memory 
contents so it is unneccessary for you to ensure that memory 
is in the RAM mode. 

4, The machine-code segment of a hybrid program should 
normally be written to tape first since most changes to a 
program are absorbed by the BASIC segment. To dump the 
machine-code segment, enter: PRINT followed by the 
beginning and ending addresses of the segment (in hexadecimal 
format), followed by the letter L to indicate to the loader 
that another segment (the BASIC segment) follows this one. 
The utility will instruct you to start the tape RECORDING 
and press GO when it has started moving and is past the 
leader, if any. The utility now proceeds to write the 
loader on the tape followed by the data. Since the data 
is machine-code and not ASCII characters, most of the data 
will show up on the screen as question marks and words with 
no context. This is the data that you don't see load when 
the machine-code segment is being loaded. When "END OF DUMP" 
is seen on the screen, stop the tape but do not rewind it. 

5. Press RESET to clear the utility program from BASIC 
memory. You are now ready to enter and dump the BASIC 
segment in the normal manner using the :PRINT ;LIST 
functions of BASIC. 


A few additional notes concerning the utility: The machine- 
code segment for the utility is at addresses 6C00 through 
6CA3. The addresses for the machine-code segment of the 
diagnostic are 7000 through 707E. Use these numbers in 
conjunction with the utility to dump extra copies of the 
utility and diagnostic. Also, by deleting the comment lines 
from the BASIC segment of the utility (lines 1 through 7), 
the program will run a little faster. Extra characters in 

a BASIC program nearly always make it run slower. 


HYBRID PROGRAM DATA TRANSFER is accomplished via the letter 
variables A through Z. The BASIC program can place parameter 
data into the variables prior to CALLing the machine-code 
routine. Likewise, the machine-code routine can return data 
to the BASIC program via the same variables. The letter 
variables begin at address 4E6E for A and continue by two 
for each succeeding letter (4E70 for B, 4E72 for C, etc.) 
Hexadecimal digits have 16 possible values remember: 
0123456789ABCDEF so that the difference between 4E6E and 
4E70 is 2. Full word 280 register pairs should be used to 
access these variables since BASIC treats them as full word 
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ae 
integers. Consider the following example: ae 


6007 70 4E C9 


10 A=28672;CALL 24576;PRINT B 


6000 21 6E 4E 6E 26 00 22 

The BASIC program sets up an input address in variable A 
and calls the machine-code program (24576=6000 Hex). The 
machine-code program reads a byte from the memory location 
given to it in A and returns the value of that byte in-s 
where the BASIC program can access it to print it. For 
those not familiar with machine-code programming, many 
excellent texts are available in self-teaching and cook- 
book style. Also, as people contribute useful machine- 
code routines, their practical use will be described and 
they will be added to a library of such routines. It is, 
therefore, not neccessary to understand how a machine-code 
routine works in order to use it in a hybrid program. 

You only have to know what it does and how to call it. 
BACKGROUND / FOREGROUND TUTORIAL. One of the best uses of 
a machine-code routine in a hybrid program is as a back- . 
ground processor. The virtual effect is to split the 280 
processor into two distinct processors: a foreground 
processor and a background processor. So complete is this 
virtual split that the resultant two processors can talk 
to each other as if they really were two separate Z80's. 
Like a bi-cameral mind, each half goes about its assigned 
duties totally oblivious to the others status. The 
foreground processor is responsible for the primary logic 
of the overall program, gathering inputs and initiating 
new processes, usually without regard for timing effects. 
The background processor is triggered by an external event 
and responds usually with fixed logic and parameters 
supplied to it by the foreground processor. The most 


common event trigger in the Bally Arcade is the screen 
interrupt which occurs 60 times a second. A background 
process tied to this stimulus will receive control at 

this 1/60th of a second interval allowing it to perform . 
repetitive operations at that rate. BASIC uses such a 
background process to implement the note timer NT for 

the duration of the tone associated with a printed © . 
character. The foreground processor prints the character 
on the screen and then sets the value of the note timer 

in a special memory location for the background processor. 
After it prints the second character, it checks the special 
location for a zero value. If the value is not zero it 
continues to wait and check. If it is zero, it places the 
new NT value in that location and continues to print the 
next character. The background processor, operating at 

the 60x rate decrements the special location. Therefore, 

a value of NT=3 equates to a note time delay during printing 
of 3/60ths of a second. The background process handles the 
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chore of time keeping while the foreground process is 
free to continue executing the main program. The most 
significant use of a background process tied to the 
screen interrupt is animation. The trick of providing 
smooth animation, like any magic trick, is to perform 
the manipulation while no one is looking. Because of 
the scanning of your TV picture, a period exists 
between "frames" where the Sweep is returned to the 
top of the screen; a period known as vertical, retrace, 
During this time, no information is being written to 
the screen. What you are Seeing during this time is 
not screen memory but the fading image of what was in 
screen memory during the preceeding 60th of a second. 
It is during this time, therefore, that no one is 
"looking" at screen memory. By asking for the screen 
interrupt to occur at the end of the scan, about three 
milliseconds are available to change screen memory 
before it starts being displayed again. If changes 
are made during this time, they will appear as smooth 
transitions as opposed to the regged-edged motion we 
often see when trying to attempt high-speed animation 
with the foreground BASIC program. The background 
processor gives you both screen Synchronization and 
high speed data manipulation required for smooth, 

fast animation. This is the same technique used in 
the animation of the various game cartridges and now 
the BLUE RAM offers you this same method. The following 
tutorial describes a sample background program. 


FAST ACTION GRAPHICS is demonstrated in this machine code 
background routine. Enter this program using your BLUE RAM 
UTILITY and watch the graphic bounce around the screen without 
disturbing what is there! The speed of motion is controlled 

by the #1 knob. Another Special effect produced by this 
routine is a "curtain of invisibility" at the top of the screen. 
As the graphic moves behind the curtain, it disappears one- 
half pixel at a time. The size of the curtain is also controlled 
by the #1 knob. Notice that you can still enter programs, etc. 
in BASIC because the graphic movement is performed in the 
background mode where it does not tie up the processor, 


—_. 


6000 F3 D9 3E 60 ED 47 35 603F FD Et DD Fl El D1 ct 
6007 18 D3 OD 21 6A 60 11 6046 Fl ED 7B 7E 70 C9 1F 
600E 00 70 01 OD 00 ED BO 604D 00 70 56 60 08 00 98 
6015 D9 FB C9 1A 60 CD BO 6054 00 50 00 00 02 08 28 
601C 20 ED 73 7E 70 31 7E 605B 00 82 00 82 00 A8 2A 
6023 70 F5 C5 D5 E5 DD E5 6062 80 80 80 A8 00 80 00 
602A FD E5 DB 1C 32 02 70 6069 2A 20 80 00 05 00 00 
6031 FF 00 07 4c 60 3F 00 6070 00 03 05 00 00 00 03 


6038 70 52 60 07 4c 60 02 | 
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Location 6000 disables the current background process. 
6001 through 6009 reassign background processing to a 
routine whose beginning address is can be found in the 
word at location 6018. 600A through 6014 move a motion 
control table into the 7000 area so that this routine 
Can operate in the ROM mode if desired. 6015 & 6016 
reenable the background processor. 6017 returns to 

the foreground program from which it was called. 
Loactions 601A through 601C envoke the Original BASIC 
background processor. This is necessary so that the 
note timer can be decremented as required when printing 
Characters. Otherwise, the foreground program would 
hang up waiting for the timer to clear and not be able 
to continue with the foreground program. 601D through 
602B save all of the Z80 registers so that their original 
values can be returned to the foreground program. 602C 
through 6030 read the #1 controller knob and place the 
value in the motion control table as the current motion 
velocity multiplier. 6031 through 603E and 604C through 
6051 invoke special graphics and animation services 
built into the Bally Arcade internal ROM. These will be 
discussed in later issues. 603F through 604B restore 
the 280 registers to their original values and return to 
the forground program in progress. 6052 through 6055 
define the boundries of the graphic motion (152 wide and 
40 high). 6056 through 6059 define the coordinate 
reference of the graphic (0,0) and the size of the 
graphic (8x8 pixels). 605A through 6069 is the image of 
the graphic itself. Note that only odd bits are used. 
This is very important when working with this BASIC 
Since even bits store the actual BASIC program statements. 
If these even bits are disturbed, the BASIC program will 
be altered, usually catastrophically. The remainder of 
the program, 606A through 6077 define the constants for 
the motion control table. These values define 5/256ths 
of a pixel times the current velocity multiplier worth 
of motion in both the X and Y coordinates with each 
update (60 times per second). The fastest speed, 
therefore, is 5 pixels x 60 updates = 300 pixels per 
second. The "3's" in the table indicate that the 
graphid is to bounce off the sides instead of stopping. 


To stop the background process from the foreground 
process using BASIC, enter: :RETURN;GO. To start it up 
again, enter: CALL 24576;GO 


ADDITIONAL BASIC FEATURES are still being found. The 
:INPUT and :LIST operations can be followed by an 
identifier for loading or listing a particular program 
from a tape that contains several programs. When dumping 
these programs to tape the identifier must be placed on 
the tape as follows: :PRINT ;TV=n;TV=m;LIST ... where 


(m)x256+(n) is the identifier. To have BASIC automatically 


find that identifier on tape, use: :INPUT (i) where i is 
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the same identifier. Example: :<PRINT ;TV=3;TV=2;LIST 
£ENPUT 515 Ge sLIST 515. 
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UNLUCKY 8000 is a hex decimal value that BASIC cannot 
perform arithemetic on. It is equivalent in decimal 
value to -32768, outside BASIC's legal range. This only 
presents a problem when the 8000 value is required in a 
machine-code program as it is at locations 6066 and 6067 
in the moving graphic program. Attempts to generate this 
number will work. It is during the read process that a 
HOW? error is produced. There is no known work-around 
for this problem except to avoid reading such a word. As 
was stated, you can generate it, write it to tape, and 
even re-read it from tape without problem. But you 
cannot list it or readit individually using the utility. 


CASSETTE INTERFACE CABLE The schematic is shown for the cable that goes 
between the interface and the Bally itself, for those of you who have 
had problems in that area: : 


cassette wtérface 





Hand Coureoller ; 
Cable xy 
Coun @e ber : i ; 
ik. 








HALLOWEEN GHOST is a self-running program that is topical. The author 

sets up a ‘at a window near his front door, and the program, a 
"talking" skull, makes snide remarks about the people going by. It 
re-cycles, and uses random statements on the screen, shifting colors | 
as well. i 
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pod 


| 


wmmn ek WN 


838 
1286 
1226 
1246 
1268 
1288 


1320 


a aes 
a 


HALLOWEEN GHOST 

BY J.WILKINSON 

: RETURN 

FOR Z=1TO 30@@;NEXT Z 
CLEAR ;BC=RND (256)-1 
FC=BC+4+RND (32)68;GOSUB 1748 
X=-32;Y=19;B0x% X,Y,38,2,3 
Y=16;BOX X,Y,34,2,3 
Y=14:BoéM X,Y,38,2,3 
Y=12;BOX X,¥,42,2,3 
Y=1@;BOX X,Y,46,2,3 
Y=9;BOX X,Y,50,17,3 


Y=-16;B0OX X,7,46,3,3 
Y=-13;BOX 4, ¥,42,3,3 
Y=-16;BOx% X,Y,38,3,3 
Y=-22:B0x% K,Y,34,19,3 
=-28;B0Ox% X,¥,380,1,3 
Y=-29;BOX X*,¥Y,26,1,3 
Y¥=-30;B0xX X*,Y,22,1,3 
¥Y=-31;BOX X,¥,18,1,3 
-R4“SKT 


H=-233;Y=8; BOX K,¥,3,2,2 
Y¥=6; BOX *,¥Y,16,14,2 
Y=-8; BOX *,Y,4,2,2 
-L/“SKT 


1 X=-41;Y=8;BOX X,Y,4,2,2 


Y=0;BOx *,Y,18,14,2 
Y=-8;BOX X,7Y,3,2,2 
.- NOSE 


K=-32;V=-18; BOX %,Y,2,2,2 
Y=-11; BOX X,Y¥,4,2,2 
¥=-12; BOX %,7,;8,2,2 
Y=-13;BOX X,Y,6,2,2 

1366 Y=-14;BOXK K,Y,10,2,2 
Y=-16;BOX X,Y,6,1,2 


1786 CX=@;CY=@;PRINT “THE INSULTING 
1868 CX=17;CY=-1@;PRINT “TU GHOST 


1828 
13846 
1868 
2488 
2014 
2626 
28038 
3468 
3818 
3828 
3021 
3638 
3046 


> 


CX=22;CY=-38;PRINT "APPEARS 


CY=32;PRINT * 
CY=32;PRINT * 
CY=32;PRINT " 
CY=32;PRINT ° 
CY=32;PRINT “ 
CY=32;PRINT * 
CY=32;PRINT “* 


CY=32;PRINT “ 
CY¥=32;PRINT “ 
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1480 
1428 
1448 
1468 
1518 
1538 
162a 
161a 
1615 
1628 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
1628 
1648 
1641 
17@Q 
1718 
1715 
1728 
1721 
1722 
1723 
1724 
1725 
1726 
1727 
1728 
1748 
1741 
1748 
1768 


CX=6;CY=-20;PRINT "MYSTERIOUSLY 






. MOUTH 

X=-32;Y=-24;BOX X,Y,10,2, 
X=-26; Y=-22;BOX X,Y,2,2,2 
X=-24;Y=-28;BOX X,Y,2,2,2 
X=-38; Y=-22;BOX X,Y,2,2,2 
X=-40; ¥=-2@;BOX X,Y,2,2,2 


-R“EYE 
A=-26; Y=-4;A=RND (5) 
X=X+A5 Y=Y+A; BOX X,Y,4,6,1 
B=RND (83 
IF B=1GoTa 
IF B=2G0TO 
IF B=3G0TO 
IF B=4Go0TO 
IF B=SGOTO 
IF B=6GOTO 2838 

IF B=7GOTO 17484 

IF B=8GOToO S&S 

FOR Z=1TO 2@06;NEXT Z 
BOX X,Y,4,6,2;GOTO 1609 
-L/EYE 

J=-44;K=-3;C=RND (5) 
J=J+C;K=K+C;BOX J,K,4,6,1 
E=RND (8) 
E=1G0OTO 
E=260TO 
E=3G60TO 
E=4G0TO 
E=SGOTOQ 
E=6GO0TO 
E=7GOTO 


1646 
1748 
2608 
2418 
2420 


1748 

1648 

3488 

3816 

38426 

3838 

3646 

E=8G0TO 5S 

FOR 2=1TO 2@@0;NEXT 2 
BOX J,K,4,6,2;GOTO 1788 
CX=25;CY=28;PRINT "* #* * 


IF 
IF 








CX=-2;CY=18;PRINT “HORRIBLE HARRY 


WHAT IS YOUR PROBLEM?-~";GOTO 17468 
YOU LOOK TERRIBLE! !!---";GoTo 1748 
THAT CAN’ T BE -YOUR FACE-";GOTO 1749 
YIPES!!-YOU SURE ARE UGLY";GOTO 17408 
YOUR WORMS ARE SHOWING-“;GOTO 1649 
WHO DUG YOU UP? 

HOW COME YOU HAVE 3 EYES? 
*=-32;7=12; BOX X,Y,7,9,2; BOX 4, ,18,3,2:BOX X,Y,3,4,1;GOTO §S 


--."s;GOTO 1648 


YOU LOOK LIKE THE -DEVIL-";GOTO 1646 
I'D HATE TO BE YOUR MUMMY";GOTO 1548 


ONE HUNDRED FOUR | 


| 
CA=-62;PRINT “--HERE EVERY HALLOWEEN--";FOR 7=1T0O 1586;NEXT Z;RETURN | 




















ON YOUR TV, 
INTERFACE 















olor i /Li Interface Bally-to any ateneo ‘ 
C io power oO pe on up, Will nod oflect ea ike nes IS 


with 
lV displays in step with your stereo music 
(omplezte ely 8 unit with cassette demonstration program and 


inetauctions 95 
Add your oum favorite Ant/Graphics, 61. 


z Show: 











71 games now available - ALL have full memory usea lots i hics 
action and colon - oe two (2) programs oat Mae tte, wie wit f gnap , 
documentation $10.00 . 
Vis 7 "5 Ineasunre 
Ayatollah De Dart Board 

escue Ain Daop 


Tanget (Te gus 
Kath the Tes of Game 4 


Sink the ates 
Search & ery 
Base 2000 


S#aa 
The Black Lagoen 


Mission Impossible 


FOR FREE (CATALOG WRITE: 


SOFTWARE 
8599 FRAME pea 


NEM 4 RGr 
ONE HUNDRED FIVE 
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ADS o Tiny BASIC cartridges $40. ppd. limited quantity - use with your salvage 
board for dedicated computer operations. Bob Fabris. 
o BALLY service Center - caters to NY, NJ, & CT - 8900 Boulevard East, 
North Bergen, NJ, 07047 
o STARTEK Electronics will repair your Bally. Send printed circuit board 
and $25 - you will be billed for necessary parts. (i-.e-, cost is $25 
plus parts) 552 Ida Court. Mt. Prospect, I11, 60056 
o FOR SALE Bally Home Library Computer with 4 hand controllers, BASIC, 
Cassette Interface, SPACE INVADERS,CLOWNS,SEAWOLF,280 ZAP,STAR BATTLE, 
BASEBALL, BINGO MATH. Includes all issues of the ARCADIAN and the PA-1 
service Manual and schematic. All in good working order. Sacrifice at 
@235- Bob Whitton,8022 New Salwm St. San Diego CA 92126 714-566-3759 
o FOR SALE Bally Arcade with 4 hand controls, BASIC, BASEBALL, TENNIS,HOCKEY, 
HANDBALL, 280 ZAP,RED BARON. $295. Rollin Kaltenbaugh, 1962 Ponderosa 
Ave., Memphis TN, 38116 901-345-2267 
Bally Arcade with BASIC, Interface, 2 controllers BASEBALL,CLOWNS and 
assorted programs in Basic. Any reasonable offer accepted. Larry 
Gallant, 5350 Elmcrest In, Cincinnati OH 45242 
o FOR SALE Bally Arcade -BASIC, interface, FOOTBALL, BLACKJACK, SEAWOLF, 
BASEBALL. 4 hand controllers, $300 or offer Mrs. Jane Smith 920 
S.Michael Way, Camano Island, WA 98292 206-387-6762 
o W & W Software Sales, 6594 Swartout Rd. Algonac MI 48001. We have 9 
tapes with 5 programs each, with or without listings. Or get listings 
only, so you can pick and choose any of the 45 available programs. 
Excellent variety, color, graphics, use of hand controller, and much 
more. Games, business programs, and teaching aides for children and 
adults. Send 25¢ for more information and a copy of Air Traffic 
Controller, or SAE for information only. 
o L&M Software now has "Target(Trio of Games)" and "Kill the Vulcan". 
Full memory usage, pistol grip controlled. Cost is $10. complete, with 
documentation. Free Catalog. To order yours send to L ¢ M Software, 
8599 Framewood Dr. Newburgh IN 47630 (money orders get faster service) 
o Sound Quality Enhancement - Here's a full range of sound from your Bally 
with the Sound System I Audio Add-on. Connects to expansion port; cable 
and connector included. Features 4-8 ohm speaker output, 2 pre-amp 
. outputs, headphone jack, on/off-volume control. and 117v operation. 
Only $28. wired and tested.’ Identify if you have a Blue Ram. 
Heavy duty power controller to replace Bally wall transformer. All steel 
cabinet construction with on/off switch and indicator light plus an 
__....__eaSy-to-replace fuse output. Line cord, Bally power connector, $24. _ 
Alternative Engineering, 1 Gilbert Drive, Chelsea, ME| 04330 
(above items available late September) 
o WANTED Used or rejected BALLY Enrike, apartado 219, Chetumal, 
QROO MEXICO 
© FOR SALE Brand New "Blue Ram" hardware add-on. Assembled with software 
and power supply. Best offer over $150. George Collins, 30 Sierra Ave, 


et “ONE HUNDRED SIX 
song on | 
Robert Fabris, vacationing 
3626 Morrie Dr. 


San Jose, CA 95127 
Source TCD 959 
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